home *** CD-ROM | disk | FTP | other *** search
/ Interactive Preview: Enemy of the State / Interactive Preview: Enemy of the State.iso / pc / alrtthis.dxr / 00093.ls < prev    next >
Encoding:
Text File  |  1998-11-18  |  964 b   |  34 lines

  1. on keyDown
  2.   global gHiddenPassword
  3.   if (the text of field "PromptMsg2" contains "password") or (the text of field "PromptMsg2" contains "Password") or (the text of field "PromptMsg2" contains "PASSWORD") then
  4.     if gHiddenPassword = EMPTY then
  5.       set the text of field "PromptFld2" to EMPTY
  6.     end if
  7.     case the keyCode of
  8.       49, 123, 124:
  9.         pass()
  10.       51:
  11.         delete char -30000 of gHiddenPassword
  12.         delete char -30000 of field "PromptFld2"
  13.       36:
  14.         closePromptAndReturnValues()
  15.       otherwise:
  16.         put the key after gHiddenPassword
  17.         put "‚Ä¢" after field "PromptFld2"
  18.     end case
  19.   else
  20.     case the keyCode of
  21.       36:
  22.         closePromptAndReturnValues()
  23.       otherwise:
  24.         pass()
  25.     end case
  26.   end if
  27. end
  28.  
  29. on mouseDown
  30.   if (the text of field "PromptMsg2" contains "password") or (the text of field "PromptMsg2" contains "Password") then
  31.     set the text of field "PromptFld2" to EMPTY
  32.   end if
  33. end
  34.